home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / scope / 151-175 / scopedisk168 / asmmacros / am_02 / setcomment.i < prev    next >
Text File  |  1995-03-19  |  525b  |  20 lines

  1.      NOLIST
  2. SetComment  MACRO              ; 15 Sept 88
  3. *------------------------------; Start of SetComment macro.
  4.                                ; Do set-up for _LVOSetComment.
  5.      MOVE.L #\1,D1
  6.      MOVE.L #\2,D2
  7.      NOLIST
  8.      IFEQ ReEntrant-1
  9.      LIST
  10.      ADD.L A5,D1
  11.      ADD.L A5,D2
  12.      NOLIST
  13.      ENDC
  14.      LIST
  15.      CallLib SetComment,dos    ; Call SetComment.
  16.      TST.L D0                  ; Make the zero flag indicate failure.
  17. *------------------------------; End of SetComment macro.
  18.      ENDM
  19.      LIST
  20.